home *** CD-ROM | disk | FTP | other *** search
/ MacFormat España 24 / MacFormat n. 24 (Spain) / MacFormat 24.bin / Demos / Jungle Activated! / JungleActivated Demo / jung DEMO d / 00194_Juke Box 2.ls < prev    next >
Encoding:
Text File  |  1996-10-14  |  307 b   |  14 lines
  1. on enterFrame
  2.   global gBackgroundSound, gBackgroundVolume
  3.   set the volume of sound 2 to gBackgroundVolume
  4.   if the windowList = [] then
  5.     if soundBusy(2) = 0 then
  6.       sound playFile 2, getpn() & "Sounds:Bckgrd" & gBackgroundSound & ".aif"
  7.     end if
  8.   end if
  9. end
  10.  
  11. on exitFrame
  12.   go(marker(0) + 0)
  13. end
  14.